function [a] = Average(A)

a = 0;
for i = 1:1:length(A)
  a = a + A(i); 
end

a = a/length(A);
